home *** CD-ROM | disk | FTP | other *** search
/ Hip Tissue / Hip Tissue - Disc 1.iso / pc / dir / gcphoto2.dxr / 00001.ls next >
Encoding:
Text File  |  1997-11-06  |  850 b   |  32 lines
  1. on exitFrame
  2.   global skip, no, jikan, auto, pani, ntitle, pmai
  3.   go(the frame)
  4.   set the keyDownScript to "if the key = RETURN then CONTO"
  5.   if pani = "on" then
  6.     set wleft to the stageLeft
  7.     set wtop to the stageTop
  8.     set stagedef to rect(wleft, wtop, wleft + 640, wtop + 480)
  9.     set the rect of window "GNpanic" to stagedef
  10.     set the windowType of window "GNpanic" to 3
  11.     open(window "GNpanic")
  12.     pause()
  13.     set auto to 2
  14.   end if
  15.   if auto = 1 then
  16.     if (skip + (jikan * 60)) <= the timer then
  17.       conto()
  18.       set no to the memberNum of sprite 1
  19.       set no to no + 1
  20.       if no <= pmai then
  21.         set the memberNum of sprite 1 to no
  22.       else
  23.         set no to 50
  24.         set the memberNum of sprite 1 to no
  25.       end if
  26.       set skip to the timer
  27.     end if
  28.   else
  29.     set the memberNum of sprite 1 to no
  30.   end if
  31. end
  32.